File:  of Disk: Disks/Build-2007/MyProgs-22-04-07
(Source file text) 

14          -764
1977   03240  7240  P1T5A,  CLA CMA         /7777 TO AC
1978   03241  6026          PLS             /CLEAR, LOAD AND PUNCH
1979   03242  7200          CLA
1980   03243  6026          PLS             /CLEAR BUFFER CONTENTS PRIOR TO PUNCHING

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-36

1981   03244  6021          PSF
1982   03245  5244          JMP .-1
1983   03246  2122          ISZ CTRA        /DONE?
1984   03247  5240          JMP P1T5A       /NO, REPEAT
1985   03250  5425          JMP I CHAIN     /YES, CHAIN
1986   03251  0006  P1T6,   6
1987   03252  3265          P1T7
1988                /CHECKS ABILITY OF IOT024 TO SET BUFFER TO 125 AND PUNCH IT
1989   03253  4477          SETA            /-500 TO CTRA
1990   03254  7014          -764
1991   03255  7200  P1T6A,  CLA
1992   03256  1152          TAD [125
1993   03257  6026          PLS             /CLEAR, LOAD AND PUNCH
1994   03260  6021          PSF             /WAIT FOR FLAG
1995   03261  5260          JMP .-1
1996   03262  2122          ISZ CTRA        /DONE?
1997   03263  5255          JMP P1T6A       /NO, REPEAT
1998   03264  5425          JMP I CHAIN     /YES, CHAIN
1999   03265  0007  P1T7,   7
2000   03266  3400          P1T10
2001                /CHECKS ABILITY OF IOT024 TO SET BUFFER TO 252 AND PUNCH IT
2002   03267  4477          SETA            /-500 TO CTRA
2003   03270  7014          -764
2004   03271  7200  P1T7A,  CLA
2005   03272  1151          TAD [252
2006   03273  6026          PLS             /CLEAR, LOAD AND PUNCH
2007   03274  6021          PSF             /WAIT FOR FLAG
2008   03275  5274          JMP .-1
2009   03276  2122          ISZ CTRA        /DONE?
2010   03277  5271          JMP P1T7A       /NO, REPEAT
2011   03300  5425          JMP I CHAIN     /YES, CHAIN
2012   03301  7770  PCNT2,  7770
2013   03302  7770  P7770,  7770
2014          3400  PAGE
2015   03400  0010  P1T10,  10
2016   03401  7777          7777            /END OF TESTS
2017                /CHECKS ABILITY OF PUNCH FLAG TO CAUSE AN INTERRUPT
2018   03402  4475          SETLOC          /SET INTERRUPT RETURN
2019   03403  0002          2               /TO P1E10A
2020   03404  3415          P1E10A
2021   03405  6032  P1T10A, KCC             /CLEAR TTY READER
2022   03406  6042          TCF             /CLEAR TTY PUNCH
2023   03407  6012          RRB             /CLEAR READER
2024   03410  6022          PCF             /CLEAR PUNCH
2025   03411  6001          ION             /ENABLE INTERRUPT
2026   03412  7000          NOP
2027   03413  6002          IOF             /TURN OFF INTERRUPT
2028   03414  5222          JMP P1T10B
2029   03415  4451  P1E10A, JMS I UERROR
2030   03416  0140          A
2031   03417  0000          NONE
2032   03420  5205          JMP P1T10A
2033   03421  5205          JMP P1T10A
2034   03422  4477  P1T10B, SETA            /-4095 TO CTRA
2035   03423  0001          -7777

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-37

2036   03424  4475          SETLOC          /SET INTERRUPT RETURN
2037   03425  0002          2               /TO P1T10E
2038   03426  3456          P1T10E
2039   03427  7200          CLA
2040   03430  6010          RPE             /SET INTERRUPT ENABLE
2041   03431  6026          PLS             /CLEAR, LOAD AND PUNCH
2042   03432  6021          PSF             /WAIT FOR FLAG
2043   03433  5232          JMP .-1
2044   03434  6001  P1T10C, ION
2045   03435  7000          NOP
2046   03436  6002          IOF
2047   03437  4451  P1E10B, JMS I UERROR
2048   03440  0240          B
2049   03441  0000          NONE
2050   03442  5256          JMP P1T10E
2051   03443  4475  P1T10S, SETLOC          /SET INTERRUPT RETURN
2052   03444  0002          2               /TO P1T10D
2053   03445  3455          P1T10D
2054   03446  7200          CLA
2055   03447  6026          PLS             /CLEAR, LOAD AND PUNCH
2056   03450  6021          PSF             /WAIT FOR FLAG
2057   03451  5250          JMP .-1
2058   03452  6001          ION             /ENABLE INTERRUPT
2059   03453  7000          NOP
2060   03454  5252          JMP .-2
2061   03455  5252  P1T10D, JMP .-3
2062   03456  2122  P1T10E, ISZ CTRA        /DONE?
2063   03457  5234          JMP P1T10C      /NO, REPEAT
2064   03460  6020          PCE             /CLEAR INTERRUPT ENABLE
2065   03461  5425          JMP I CHAIN     /YES, CHAIN
2066                /PROGRAM 2, READER TEST, SPECIAL BINARY COUNT PATTERN
2067   03462  4475  PRG2,   SETLOC          /SET SR
2068   03463  0105          SRMSK           /MASK TO
2069   03464  0460          0460            /0460
2070   03465  4464  P2A,    JMS I SYNC      /SYNC READER
2071   03466  4477          SETA
2072   03467  7773          -5
2073   03470  4463  P2B,    JMS I CRCNT     /GET RANDOM CHAR
2074   03471  3123          DCA CTRB        /COUNT IN CTRB
2075   03472  4467  P2C,    JMS I GETPT     /GET BINARY CHAR
2076   03473  3462          DCA I UTSB      /STORE IT
2077   03474  4455          JMS I UTREAD    /GO READ CHAR
2078   03475  4461          JMS I UTCHK     /GO CHECK IT
2079   03476  5303          JMP P2E         /ERROR
2080   03477  2123  P2D,    ISZ CTRB        /GROUP DONE?
2081   03500  5272          JMP P2C         /NO
2082   03501  4563          JMS I [STALL    /YES, STALL
2083   03502  5270          JMP P2B         /REPEAT
2084   03503  2122  P2E,    ISZ CTRA        /5 ERRORS?
2085   03504  5277          JMP P2D         /NO, CONTINUE
2086   03505  5265          JMP P2A         /RESYNC
2087                /
2088                /PROGRAM 3, PUNCH TEST, SPECIAL BINARY COUNT PATTERN
2089   03506  4460  PRG3,   JMS I UMARK     /MARK TAPE
2090   03507  4457          JMS I UPLDR     /PUNCH LEADER

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-38

2091   03510  4466          JMS I INPATT    /INITIALIZE BINARY PATTERN
2092   03511  1150          TAD [60
2093   03512  3105          DCA SRMSK
2094   03513  4467  P3A,    JMS I GETPT     /GET BINARY CHAR
2095   03514  4456          JMS I UTPCH     /PUNCH IT
2096   03515  4563          JMS I [STALL
2097   03516  5313          JMP P3A
2098                /PROGRAM 4, PUNCH VERIFY, SPECIAL BINARY COUNT PATTERN
2099   03517  4466  PRG4,   JMS I INPATT    /INITIALIZE BINARY PATTERN
2100   03520  4475          SETLOC          /400 TO
2101   03521  0105          SRMSK           /TO SR MASK
2102   03522  0400          0400
2103   03523  4467          JMS I GETPT     /GET BINARY CHAR
2104   03524  3462          DCA I UTSB      /STORE IT
2105   03525  4455          JMS I UTREAD    /READ CHARACTER
2106   03526  7440          SZA             /ZERO?
2107   03527  5334          JMP P4B         /NO
2108   03530  5325          JMP .-3         /YES, REPEAT READ
2109   03531  4467  P4A,    JMS I GETPT     /GET BINARY CHAR
2110   03532  3462          DCA I UTSB      /STORE IT
2111   03533  4455          JMS I UTREAD    /READ CHAR
2112   03534  4461  P4B,    JMS I UTCHK     /GO CHECK IT
2113   03535  7000          NOP
2114   03536  5331          JMP P4A         /REPEAT
2115                /PROGRAM 5, PUNCH TEST, RANDOM CHARACTER PATTERN
2116   03537  4460  PRG5,   JMS I UMARK     /MARK TAPE
2117   03540  4457          JMS I UPLDR     /PUNCH LEADER
2118   03541  4474          JMS I UMOVE     /INITIALIZE RANDOM
2119   03542  1247          SEED1           /CHARACTER ROUTINE
2120   03543  1251          RANP1
2121   03544  7774          -4
2122   03545  1150          TAD [60
2123   03546  3105          DCA SRMSK
2124   03547  4453  P5A,    JMS I ULPRGN    /GET RANDOM CHAR
2125   03550  4456          JMS I UTPCH     /PUNCH IT
2126   03551  4563          JMS I [STALL
2127   03552  5347          JMP P5A         /REPEAT
2128                /PROGRAM 6, PUNCH VERIFY, RANDOM CHARACTER PATTERN
2129   03553  4474  PRG6,   JMS I UMOVE     /INITIALIZE RANDOM
2130   03554  1247          SEED1           /CHARACTER ROUTINE
2131   03555  1251          RANP1
2132   03556  7774          -4
2133   03557  4475          SETLOC          /400 TO
2134   03560  0105          SRMSK           /SR MASK
2135   03561  0400          0400
2136   03562  4454          JMS I ULRRGN    /GET RANDOM CHAR
2137   03563  3462          DCA I UTSB      /STORE IT
2138   03564  4455          JMS I UTREAD    /READ CHAR
2139   03565  7440          SZA             /ZERO?
2140   03566  5373          JMP P6B         /NO
2141   03567  5364          JMP .-3
2142   03570  4454  P6A,    JMS I ULRRGN    /GET RANDOM CHAR
2143   03571  3462          DCA I UTSB      /STORE IT
2144   03572  4455          JMS I UTREAD    /READ CHAR
2145   03573  4461  P6B,    JMS I UTCHK     /GO CHECK IT

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-39

2146   03574  7000          NOP             /ERROR
2147   03575  5370          JMP P6A
2148          3600  PAGE
2149                /PROGRAM 7, COMBINES READER-PUNCH TEST, SPECIAL BINARY COUNT PATTERN
2150   03600  4475  PRG7,   SETLOC          /SET SR MASK TO 0460
2151   03601  0105          SRMSK
2152   03602  0460          0460
2153   03603  4475          SETLOC
2154   03604  0104          DLYMSK
2155   03605  0077          77
2156   03606  4466          JMS I INPATT    /INITIALIZE BINARY PATTERN
2157   03607  2133          ISZ ACTIND      /SET ACTIVE INDICATOR
2158   03610  4475          SETLOC          /SET INTERRUPT
2159   03611  0002          2               /SERVIE ADDRESS
2160   03612  0703          INTSVC
2161   03613  4475          SETLOC          /SET PUNCH SERVICE ADDRESS
2162   03614  0716          PVCTR
2163   03615  3624          PBIN
2164   03616  4475          SETLOC          /SET READER SERVICE ADDRESS
2165   03617  0711          RVCTR
2166   03620  3671          WNZERO
2167   03621  4246          JMS CPCH        /PUNCH CHAR
2168   03622  6001          ION             /ENABLE INTERRUPT
2169   03623  5223          JMP .           /IDLE
2170   03624  2132  PBIN,   ISZ PCHCNT      /INCREMENT PUNCH COUNT
2171   03625  1132          TAD PCHCNT      /COMPARE PUNCH COUNT
2172   03626  1147          TAD [-144       /TO 100
2173   03627  7710          SPA CLA         /GREATER THAN 100?
2174   03630  5233          JMP .+3         /NO, OK
2175   03631  7402          HLT             /YES, ERROR HALT
2176   03632  5231          JMP .-1
2177   03633  4246          JMS CPCH        /PUNCH BIN CHAR
2178   03634  1127          TAD RBUSY
2179   03635  7640          SZA CLA         /READER BUSY?
2180   03636  5503          OUT             /YES, EXIT
2181   03637  1132          TAD PCHCNT      /GET PUNCH COUNT
2182   03640  1146          TAD [-12        /SUBTRACT SLACK COUNT
2183   03641  7710          SPA CLA         /POSITIVE?
2184   03642  5503          OUT             /NO, EXIT
2185   03643  6014          RFC             /YES, START READER
2186   03644  2127          ISZ RBUSY       /SET READER BUSY
2187   03645  5503          OUT             /EXIT
2188   03646  0000  CPCH,   0
2189   03647  4470          JMS I GETPTR    /GET BIN CHAR
2190   03650  6026          PLS             /ENABLE PUNCH
2191   03651  7200          CLA             /CLEAR AC
2192   03652  5646          JMP I CPCH      /EXIT
2193   03653  0000  CREAD,  0
2194   03654  7200          CLA
2195   03655  6012          RRB             /READ CHAR
2196   03656  3131          DCA TCHKW       /STORE IT
2197   03657  1132          TAD PCHCNT      /GET PUNCH COUNT
2198   03660  1145          TAD [-1         /MINUS 1
2199   03661  3132          DCA PCHCNT      /STORE IT
2200   03662  1132          TAD PCHCNT

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-40

2201   03663  7640          SZA CLA         /0?
2202   03664  5267          JMP .+3         /NO
2203   03665  3127          DCA RBUSY       /YES, CLEAR READER BUSY
2204   03666  5653          JMP I CREAD     /EXIT
2205   03667  6014          RFC             /FETCH NEXT CHAR
2206   03670  5653          JMP I CREAD     /EXIT
2207   03671  4253  WNZERO, JMS CREAD       /READ CHAR
2208   03672  1131          TAD TCHKW
2209   03673  7650          SNA CLA         /IS IT 0?
2210   03674  5503          OUT             /YES
2211   03675  4475          SETLOC          /SET INTERRUPT SERVICE
2212   03676  0711          RVCTR           /TO RBIN
2213   03677  3703          RBIN
2214   03700  4477          SETA            /-5 TO CTRA
2215   03701  7773          -5
2216   03702  7410          SKP
2217   03703  4253  RBIN,   JMS CREAD       /READ CHAR
2218   03704  4467          JMS I GETPT     /GET BINARY CHAR
2219   03705  3462          DCA I UTSB
2220   03706  1131          TAD TCHKW       /GET CHAR READ
2221   03707  4461          JMS I UTCHK     /GO CHECK IT
2222   03710  7410          SKP             /ERROR
2223   03711  5503          OUT             /NO
2224   03712  2122          ISZ CTRA        /5 ERRORS?
2225   03713  5503          OUT             /NO, TO MAINLINE
2226   03714  4475  RBINA,  SETLOC          /YES, SET READER SERVICE
2227   03715  0711          RVCTR           /TO RESYNC TAPE
2228   03716  3720          .+2
2229   03717  5503          OUT
2230   03720  4253          JMS CREAD       /READ CHAR
2231   03721  1131          TAD TCHKW
2232   03722  3110          DCA CHR1        /STORE
2233   03723  4475          SETLOC          /SET READER SERVICE
2234   03724  0711          RVCTR
2235   03725  3727          .+2
2236   03726  5503          OUT
2237   03727  4253          JMS CREAD       /READ CHAR
2238   03730  1131          TAD TCHKW
2239   03731  3111          DCA CHR2
2240   03732  4475          SETLOC          /SET READER SERVICE
2241   03733  0711          RVCTR
2242   03734  3736          .+2
2243   03735  5503          OUT
2244   03736  4253          JMS CREAD       /READ CHAR
2245   03737  1131          TAD TCHKW
2246   03740  3112          DCA CHR3
2247   03741  4465          JMS I SYNCA     /GO SYNC
2248   03742  5314          JMP RBINA       /SYNC ERROR, TRY AGAIN
2249   03743  4477          SETA            /YES, -5 TO CTRA
2250   03744  7773          -5
2251   03745  4475          SETLOC          /RESTORE READER SERVICE TO
2252   03746  0711          RVCTR           /TO RBIN
2253   03747  3703          RBIN
2254   03750  5503          OUT
2255          4000  PAGE

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-41

2256                /PROGRAM 10, READ AMPLIFIER ADJUSTMENT LOOP
2257   04000  4475  PRG10,  SETLOC          /SET INTERRUPT SERVICE
2258   04001  0002          2               /TO INTSVC
2259   04002  0703          INTSVC
2260   04003  4475          SETLOC          /SET PUNCH SERVICE ADDRESS
2261   04004  0716          PVCTR           /TO PCHCLR
2262   04005  0741          PCHCLR
2263   04006  4475          SETLOC          /SET READER SERVICE ADDRESS
2264   04007  0711          RVCTR           /TO AMPRDA
2265   04010  4070          AMPRDA
2266   04011  4475          SETLOC
2267   04012  1075          ERRORA
2268   04013  7000          7000
2269   04014  1144          TAD [NOP
2270   04015  3572          DCA I [STALL+3
2271   04016  3105          DCA SRMSK       /0 TO SR MASK
2272   04017  4253  RAMPA,  JMS AMPRD       /GO READ CHAR
2273   04020  7440          SZA             /ZERO?
2274   04021  7410          SKP             /NO
2275   04022  4253  RAMPB,  JMS AMPRD       /GO READ CHAR
2276   04023  7041          CIA
2277   04024  1153          TAD [PTMSK
2278   04025  7640          SZA CLA         /ALL 1'S?
2279   04026  5233          JMP RAMPC       /NO, ERROR
2280   04027  4253          JMS AMPRD       /YES, GO READ
2281   04030  7640          SZA CLA         /ZERO?
2282   04031  5242          JMP RAMPD       /NO, ERROR
2283   04032  5222          JMP RAMPB       /YES, REPEAT
2284   04033  4452  RAMPC,  JMS I UASCCN    /CONVERT EXPECTED CHAR
2285   04034  4052          RAMPF           /TO PRINTABLE ASCII
2286   04035  1604          SB
2287   04036  4452          JMS I UASCCN    /CONVERT BAD CHAR TO
2288   04037  4074          RAMPWA          /TO PRINTABLE ASCII
2289   04040  1611          WAS
2290   04041  5246          JMP RAMPE
2291   04042  4452  RAMPD,  JMS I UASCCN    /CONVERT EXPECTED CHAR
2292   04043  4075          RAMPWB          /TO PRINTABLE ASCII
2293   04044  1604          SB
2294   04045  5236          JMP RAMPD-4
2295   04046  4451  RAMPE,  JMS I UERROR    /GO PRINT ERROR
2296   04047  4040          NOSUF
2297   04050  1601          SBWAS
2298   04051  5217          JMP RAMPA       /TRY AGAIN
2299   04052  0377  RAMPF,  377
2300   04053  0000  AMPRD,  0
2301   04054  4501          SETDLM          /-75 TO DELAYM
2302   04055  7665          -113
2303   04056  6014          RFC             /FETCH CHAR
2304   04057  6001          ION             /ENABLE INTERRUPT
2305   04060  4502          DELAY           /DELAY 75 MS
2306   04061  6002          IOF
2307   04062  6011          RSF             /FLAG 1?
2308   04063  7410          SKP             /NO, FLAG DROPPED
2309   04064  5270          JMP AMPRDA      /YES
2310   04065  4447          JMS I XTYPST    /RING BELL 3 TIMES

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-42

2311   04066  4076          BELL3
2312   04067  5217          JMP RAMPA       /TRY AGAIN
2313   04070  6012  AMPRDA, RRB
2314   04071  3274          DCA RAMPWA
2315   04072  1274          TAD RAMPWA
2316   04073  5653          JMP I AMPRD
2317   04074  0000  RAMPWA, 0
2318   04075  0000  RAMPWB, 0
2319   04076  0007  BELL3,  0007            /BELL
2320   04077  0007          0007            /BELL
2321   04100  0007          0007            /BELL
2322   04101  0001          0001            /END CODE
2323                /
2324                /PROGRAM 11, PUNCH ANY CHAR IN SR CONTIUOUSLY
2325   04102  7604  PRG11,  LAS             /READ SR
2326   04103  0153          AND [PTMSK
2327   04104  6026          PLS             /PUNCH CHAR
2328   04105  6021          PSF             /FLAG 1?
2329   04106  5305          JMP .-1
2330   04107  5301          JMP .-6         /YES, REPEAT
2331                /
2332                /PROGRAM 12, PUNCH 1'S AND 0'S LOOP
2333   04110  4475  PRG12,  SETLOC
2334   04111  0105          SRMSK
2335   04112  0075          0075
2336   04113  7240  PRG12A, CLA CMA
2337   04114  0153          AND [PTMSK
2338   04115  4456          JMS I UTPCH     /PUNCH ALL 1'S
2339   04116  4563          JMS I [STALL
2340   04117  7200          CLA
2341   04120  4456          JMS I UTPCH     /PUNCH ALL 0'S
2342   04121  4563          JMS I [STALL
2343   04122  5313          JMP PRG12A      /REPEAT
2344          4200  PAGE
2345                /PROGRAM 13, READER SPEED PRINT LOOP
2346   04200  7200  PRG13,  CLA
2347   04201  3123          DCA CTRB        /CLEAR CTRB
2348   04202  7604          LAS             /READ SR
2349   04203  7104          CLL RAL
2350   04204  7710          SPA CLA         /LONG OR SHORT?
2351   04205  1143          TAD [-416       /LONG
2352   04206  1142          TAD [-36        /SHORT
2353   04207  3232          DCA TKN         /STORE AT TKN
2354   04210  5220          JMP TSTRL
2355   04211  6014  TSTRD,  RFC             /START READER
2356   04212  6011          RSF             /WAIT FOR
2357   04213  5212          JMP .-1         /FLAG
2358   04214  2122          ISZ CTRA        /INCREMENT CTRA
2359   04215  5222          JMP TSTRC
2360   04216  2123          ISZ CTRB        /INCREMENT CTRB
2361   04217  7000          NOP
2362   04220  1232  TSTRL,  TAD TKN         /LOAD CTRA
2363   04221  3122          DCA CTRA
2364   04222  7604  TSTRC,  LAS             /READ SR
2365   04223  7700          SMA CLA         /PRINT SPEED?

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-43

2366   04224  5211          JMP TSTRD       /NO, CONTINUE
2367   04225  4447          JMS I XTYPST    /YES
2368   04226  1532          RSPD
2369   04227  4257          JMS TSTRPC
2370   04230  7402          HLT
2371   04231  5200          JMP PRG13
2372   04232  0000  TKN,    OPEN
2373                /PROGRAM 14, PUNCH SPEED PRINT LOOP
2374   04233  7200  PRG14,  CLA
2375   04234  3123          DCA CTRB        /CLEAR CTRB
2376   04235  5245          JMP TSTPL
2377   04236  6026  TSTPP,  PLS
2378   04237  6021          PSF
2379   04240  5237          JMP .-1
2380   04241  2122          ISZ CTRA        /60?
2381   04242  5247          JMP TSTPC       /NO
2382   04243  2123          ISZ CTRB        /YES, INCREMENT CTRB
2383   04244  7000          NOP
2384   04245  1141  TSTPL,  TAD [-74
2385   04246  3122          DCA CTRA        /LOAD -60 IN CTRA
2386   04247  7604  TSTPC,  LAS             /READ SR
2387   04250  7700          SMA CLA         /PRINT SPEED (AFTER 60 SECONDS)
2388   04251  5236          JMP TSTPP       /NO, CONTINUE
2389   04252  4447          JMS I XTYPST    /YES
2390   04253  1543          PSPD
2391   04254  4257          JMS TSTRPC
2392   04255  7402          HLT
2393   04256  5233          JMP PRG14
2394   04257  0000  TSTRPC, 0
2395   04260  4265          JMS BDCNV       /TYPE C(CTRB) IN DECIMAL
2396   04261  0123          CTRB
2397   04262  4447          JMS I XTYPST    /TYPE "CPS"
2398   04263  1554          CPS
2399   04264  5657          JMP I TSTRPC    /EXIT
2400   04265  0000  BDCNV,  0               /BINARY TO DECIMAL CONVERT
2401   04266  4475          SETLOC          /AND PRINT SUBROUTINE
2402   04267  4331          CNVCTR
2403   04270  7774          -4
2404   04271  1322          TAD ADDRZA      /INITIALIZE ARROW
2405   04272  3303          DCA ARROW
2406   04273  1665          TAD I BDCNV     /GET AND STORE BINARY
2407   04274  2265          ISZ BDCNV       /NUMBER, SORE IT AT VALUE
2408   04275  3330          DCA DIGIT
2409   04276  1730          TAD I DIGIT
2410   04277  3327          DCA VALUE
2411   04300  3330          DCA DIGIT       /O TO DIGIT
2412   04301  7100          CLL
2413   04302  1327          TAD VALUE
2414   04303  1323  ARROW,  TAD TENPWR
2415   04304  7420          SNL
2416   04305  5311          JMP .+4
2417   04306  2330          ISZ DIGIT
2418   04307  3327          DCA VALUE
2419   04310  5301          JMP ARROW-2
2420   04311  7200          CLA

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-44

2421   04312  1330          TAD DIGIT
2422   04313  1140          TAD [260
2423   04314  4473          JMS I UPUNCH
2424   04315  7300          CLA CLL
2425   04316  2303          ISZ ARROW
2426   04317  2331          ISZ CNVCTR
2427   04320  5300          JMP ARROW-3
2428   04321  5665          JMP I BDCNV
2429   04322  1323  ADDRZA, TAD TENPWR
2430   04323  6030  TENPWR, -1750
2431   04324  7634          -144
2432   04325  7766          -12
2433   04326  7777          -1
2434   04327  0000  VALUE,  0
2435   04330  0000  DIGIT,  0
2436   04331  0000  CNVCTR, 0
2437                /
2438                /PROGRAM 15, READ X CHARACTERS, STALL Y MS, LOOP TO ADJUST TIMINGS
2439   04332  7602  PRG15,  HLT CLA         /HALT TO SET SR
2440   04333  7604          LAS             /READ SR
2441   04334  0174          AND [177        /MASK OFF EXCESS BITS
2442   04335  7041          CIA
2443   04336  3021          DCA DELAYM      /STORE STALL COUNT
2444   04337  7604          LAS             /READ SR
2445   04340  0137          AND [7600       /MASK OFF EXCESS BITS
2446   04341  7106          CLL RTL
2447   04342  7006          RTL
2448   04343  7006          RTL
2449   04344  7041          CIA
2450   04345  3347          DCA .+2
2451   04346  4477  P15A,   SETA            /-X TO CTRA
2452   04347  0000          0
2453   04350  6014  P15B,   RFC             /FETCH CHAR
2454   04351  6011          RSF             /FLAG 1?
2455   04352  5351          JMP .-1
2456   04353  2122          ISZ CTRA        /READ X CHARS?
2457   04354  5350          JMP P15B        /NO
2458   04355  4502          DELAY           /YES, DELAY Y MS
2459   04356  5333          JMP PRG15+1     /REPEAT
2460                /WOW! I DONE IT...
2461                $
2462   00137  7600
2463   00140  0260
2464   00141  7704
2465   00142  7742
2466   00143  7362
2467   00144  7000
2468   00145  7777
2469   00146  7766
2470   00147  7634
2471   00150  0060
2472   00151  0252
2473   00152  0125
2474   00153  0377
2475   00154  0020

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 1-45

2476   00155  0040
2477   00156  0200
2478   00157  0400
2479   00160  6060
2480   00161  0707
2481   00162  7700
2482   00163  1125
2483   00164  0240
2484   00165  0100
2485   00166  7740
2486   00167  7510
2487   00170  7500
2488   00171  0077
2489   00172  1130
2490   00173  7640
2491   00174  0177
2492   00175  0031
2493   00176  7763
2494   00177  0017

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 2

A      0140      GETPT  0067      PRG4   3517      P0T6A  2435
AC     0023      GETPTR 0070      PRG5   3537      P0T6B  2453
ACTIND 0133      GETPTT 1412      PRG6   3553      P0T6S  2446
ADDRZA 4322      GETRDY 0242      PRG7   3600      P0T7   2600
AMPRD  4053      GTPTRP 1435      PRINT  0671      P0T7A  2604
AMPRDA 4070      INCRTN 0266      PSPD   1543      P0T7B  2615
ARROW  4303      INIT   0217      PTMSK  0377      P0T7S  2632
ASCCN  1000      INITPT 1400      PT0    1460      P0T7WA 2635
ASCT   1041      INPATT 0066      PT1    1461      P0T7WB 2636
B      0240      INTSVC 0703      PT2    1462      P1E0   3017
BDCNV  4265      IOUT   0733      PT3    1463      P1E1   3051
BELL3  4076      KSTART 0020      PUNCH  0426      P1E10A 3415
CHAIN  0025      LINK   0024      PVCTR  0716      P1E10B 3437
CHAINN 0270      LPRGN  1255      P0E0   2025      P1E2   3076
CHCK   0521      LRRGN  1273      P0E1   2052      P1E3   3147
CHECK  0071      MARK   1230      P0E10A 2654      P1E4   3224
CHRCNT 0324      MARKAD 1246      P0E2   2073      P1T0   3010
CHR1   0110      MARKER 1521      P0E3   2137      P1T0A  3014
CHR2   0111      MCTR   0563      P0E4   2224      P1T0B  3027
CHR3   0112      MILCTR 0121      P0E5   2412      P1T0S  3023
CNV    1024      MILLI  0135      P0E6   2442      P1T1   3032
CNVCTR 4331      MIL1   0106      P0E7   2620      P1T1A  3044
COUNT  0022      MOVE   0536      P0T0   2010      P1T1B  3046
CPCH   3646      MOVEA  0551      P0T0A  2016      P1T1S  3055
CPIC   0107      MSCTR  0120      P0T0S  2031      P1T10  3400
CPS    1554      NONE   0000      P0T1   2036      P1T10A 3405
CRCNT  0063      NOSUF  4040      P0T1A  2045      P1T10B 3422
CRCTR  0615      NXTST  0117      P0T1S  2056      P1T10C 3434
CREAD  3653      OPEN   0000      P0T10  2637      P1T10D 3455
CRLF   0600      OUT    5503      P0T10A 2644      P1T10E 3456
CTR    0136      PBIN   3624      P0T10B 2661      P1T10S 3443
CTRA   0122      PCHCLR 0741      P0T10C 2672      P1T2   3063
CTRB   0123      PCHCNT 0132      P0T10D 2712      P1T2A  3067
CTRC   0124      PCNT2  3301      P0T10E 2713      P1T2B  3112
CTRD   0125      PFLAG  0126      P0T10S 2701      P1T2S  3102
CTSK   1363      PIND   1465      P0T11  2717      P1T3   3115
CTSK1  1364      PLDR   1214      P0T11A 2723      P1T3A  3137
CURTST 0115      PLDRW  1227      P0T11B 2743      P1T3S  3153
DELAY  4502      PLOOP  3205      P0T11C 2746      P1T4   3200
DELAYM 0021      PNUMB  1471      P0T11S 2755      P1T4A  3220
DELTIM 0134      PRGADR 0240      P0T2   2064      P1T4S  3230
DIGIT  4330      PRGEND 0305      P0T2A  2071      P1T5   3234
DLCNT  0513      PRGNUM 0030      P0T2OK 2102      P1T5A  3240
DLYCNT 0072      PRGTAB 0031      P0T2S  2077      P1T6   3251
DLYMS  0411      PRG0   2000      P0T3   2105      P1T6A  3255
DLYMSK 0104      PRG1   3000      P0T3A  2127      P1T7   3265
DLY212 2766      PRG10  4000      P0T3S  2143      P1T7A  3271
DLY250 2773      PRG11  4102      P0T4   2200      P15A   4346
ENUMB  1474      PRG12  4110      P0T4A  2220      P15B   4350
ERNUMB 1466      PRG12A 4113      P0T4S  2230      P2A    3465
ERROR  1050      PRG13  4200      P0T5   2400      P2B    3470
ERRORA 1075      PRG14  4233      P0T5A  2404      P2C    3472
FADDR  0561      PRG15  4332      P0T5B  2425      P2D    3477
FLAG   0702      PRG2   3462      P0T5S  2416      P2E    3503
FORWD  0307      PRG3   3506      P0T6   2430      P3A    3513

/HIGH SPEED READER/PUNCH TESTS            PAL8-V10A 23-OCT-81 PAGE 2-1

P4A    3531      SR1MSK 2000      ULRRGN 0054      
P4B    3534      SR2MSK 1000      UMARK  0060      
P5A    3547      SR3MSK 0400      UMOVE  0074      
P6A    3570      SR4MSK 0200      UNEXIT 0730      
P6B    3573      SR5MSK 0100      UNINT  1501      
P7770  3302      SR6MSK 0040      UPLDR  0057      
RAMPA  4017      SR7MSK 0020      UPUNCH 0073      
RAMPB  4022      STALL  1125      URDSR  0076      
RAMPC  4033      STCTA  1111      USTCTA 0077      
RAMPD  4042      STCTB  1117      USTCTB 0100      
RAMPE  4046      STCTR  0400      USTCTR 0075      
RAMPF  4052      STDLYM 1042      USTDLM 0101      
RAMPWA 4074      STRT   0200      UTCHK  0061      
RAMPWB 4075      SUFX   1476      UTPCH  0056      
RANCON 0477      SWITCH 0673      UTREAD 0055      
RANDEX 0476      SYNC   0064      UTSB   0062      
RANDNO 0027      SYNCA  0065      VALUE  4327      
RANGEN 0447      SYNK   1311      WAS    1611      
RANP1  1251      SYNKA  1324      WASC   1037      
RANP2  1252      SYNKB  1347      WCHK   0535      
RANR1  1253      SYNKC  1351      WNZERO 3671      
RANR2  1254      TADDR  0562      WRTN   1560      
RANSAV 0512      TCHK   1143      XTYPST 0047      
RANTAD 0464      TCHKW  0131      
RANTBL 0500      TDOMSG 1615      
RANTND 0511      TEMP   0113      
RBIN   3703      TEMP1  0114      
RBINA  3714      TEMQ   0700      
RBUSY  0127      TEMR   0701      
RCF    6014      TENPWR 4323      
RCHKW  0130      TIM    2151      
RCNT2  2235      TIM1   3161      
RDRCLR 0743      TKN    4232      
RDSR   0443      TPCH   1207      
READSR 4476      TREAD  1200      
RIND   1464      TSB    1145      
RLOOP  2205      TSC1   0624      
RSPD   1532      TSC2   0635      
RTNNO  0116      TSTMSK 0017      
RVCTR  0711      TSTPC  4247      
R7770  2234      TSTPL  4245      
SASC   1040      TSTPP  4236      
SB     1604      TSTRC  4222      
SBWAS  1601      TSTRD  4211      
SEED1  1247      TSTRL  4220      
SETA   4477      TSTRPC 4257      
SETB   4500      TYPAT  0646      
SETDLM 4501      TYPSP  0652      
SETLOC 4475      TYPSTG 0616      
SFADR  1110      UASCCN 0052      
SHALT  0333      UCRLF  0050      
SHLT   0026      UDLYMS 0102      
SRMSK  0105      UERROR 0051      
SRSET  0241      UIOUT  0103      
SR0MSK 4000      ULPRGN 0053      



ERRORS DETECTED: 0
LINKS GENERATED: 0




A          678# 1723  1774  2030  
AC         583# 1009  1036  
ACTIND     656# 2157  
ADDRZA    2404  2429# 
AMPRD     2272  2275  2280  2300# 2316  
AMPRDA    2265  2309  2313# 
ARROW     2405  2414# 2419  2425  2427  
ASCCN      607  1045# 1047  1049  1050  1052  1064  
ASCT      1066  1067  1071  1078# 
B          679# 1740  1785  2048  
BDCNV     2395  2400# 2406  2407  2428  
BELL3     2311  2319# 
CHAIN      585# 1111  1494  1516  1544  1572  1612  1616  1648  1672  
          1691  1756  1783  1837  1853  1890  1917  1963  1967  1985  
          1998  2011  2065  
CHAINN     585   768#  782  
CHCK       622   901#  903   906   909   910   912  
CHECK      622# 1146  
CHRCNT     616   796#  800   802  
CHR1       637# 1241  1258  2232  
CHR2       638# 1243  1263  2239  
CHR3       639# 1245  1272  2246  
CNV       1058  1063  1065# 1075  
CNVCTR    2402  2426  2436# 
COUNT      582# 1550  1570  1608  1895  1915  1959  
CPCH      2167  2177  2188# 2192  
CPIC       636# 
CPS       1391# 2398  
CRCNT      616# 2073  
CRCTR      944   948   954# 
CREAD     2193# 2204  2206  2207  2217  2230  2237  2244  
CRLF       605   941#  943   945   950  
CTR        659# 1552  1558  1897  1903  
CTRA       647# 1122  1492  1514  1542  1646  1670  1689  1753  1781  
          1835  1851  1888  1983  1996  2009  2062  2084  2224  2358  
          2363  2380  2385  2456  
CTRB       648# 1128  1200  2074  2080  2347  2360  2375  2382  2396  
CTRC       649# 
CTRD       650# 
CTSK      1251  1266  1280# 
CTSK1     1254  1277  1281# 
CURTST     642#  752   758   792  
DELAY      676   683# 1143  1489  1502  1618  1665  1768  1770  1792  
          1800  1805  1848  1969  2305  2458  
DELAYM     581#  822   896  1083  1141  2443  
DELTIM     657# 1561  1584  1906  1929  1932  1933  1935  
DIGIT     2408  2409  2411  2417  2421  2435# 
DLCNT      623   892#  897  
DLYCNT     623# 1140  
DLYMS      631   820#  832  
DLYMSK     633#  737  2154  
DLY212    1778  1797# 1801  
DLY250    1762  1802# 1806  
ENUMB     1092  1343# 
ERNUMB    1096  1337# 
ERROR      606  1086# 1093  1097  1098  1115  1116  1117  
ERRORA     734  1107# 2267  
FADDR      920   929   931   936# 

FLAG       959   973   981   983  1007# 
FORWD      748   783#  795  
GETPT      620# 1256  1261  1270  2075  2094  2103  2109  2218  
GETPTR     621# 2189  
GETPTT     620  1293# 1311  
GETRDY     745#  762   766   772   776   780  
GTPTRP     621  1312# 1330  
INCRTN     765# 
INIT       724# 
INITPT     619  1283# 1292  
INPATT     619# 1239  2091  2099  2156  
INTSVC    1009# 2160  2259  
IOUT       632  1033# 
KSTART     580#  746  1473  1812  
LINK       584# 1011  1034  
LPRGN      608  1210# 1223  
LRRGN      609  1224# 1237  
MARK       613  1189# 1202  
MARKAD    1194  1197  1199  1203# 
MARKER    1195  1364# 
MCTR       926   933   938# 
MILCTR     646#  827   828  
MILLI      658# 1555  1556  1900  1901  
MIL1       635#  826  
MOVE       625   917#  919   921   922   924   925   927   935  
MOVEA      928#  934  
MSCTR      645#  823   830  
NONE       680# 1497  1519  1537  1575  1615  1637  1663  1724  1741  
          1775  1786  1829  1856  1878  1920  1966  2031  2049  
NOSUF      681# 1159  1496  1518  1536  1574  1614  1636  1662  1699  
          1828  1855  1877  1919  1965  2296  
NXTST      644#  747   759   773   785   787   788   790   791   794  
OPEN       685# 2372  
OUT        677   684# 1024  1029  1041  1043  2180  2184  2187  2210  
          2223  2225  2229  2236  2243  2254  
PBIN      2163  2170# 
PCHCLR    1040# 2262  
PCHCNT     655# 2170  2171  2181  2197  2199  2200  
PCNT2     1948  1961  2012# 
PFLAG      651#  835   838   845  1028  
PIND      1291  1316  1318  1319  1336# 
PLDR       612  1176# 1186  1190  
PLDRW     1178  1184  1187# 
PLOOP     1949# 1960  1962  
PNUMB     1089  1340# 
PRGADR     723   741# 
PRGEND     781# 
PRGNUM     588#  718   719  1088  
PRGTAB     589#  720  
PRG0       589  1472# 
PRG1       590  1811# 
PRG10      597  2257# 
PRG11      598  2325# 
PRG12      599  2333# 
PRG12A    2336# 2343  
PRG13      600  2346# 2371  
PRG14      601  2374# 2393  
PRG15      602  2439# 2459  

PRG2       591  2067# 
PRG3       592  2089# 
PRG4       593  2099# 
PRG5       594  2116# 
PRG6       595  2129# 
PRG7       596  2150# 
PRINT      979   994   998# 1004  
PSPD      1382# 2390  
PTMSK      670# 1222  1236  1308  1327  2277  2326  2337  
PT0       1285  1287  1295  1309  1331# 
PT1       1288  1296  1303  1306  1310  1332# 
PT2       1314  1328  1333# 
PT3       1315  1322  1325  1329  1334# 
PUNCH      624   834#  846  
PVCTR     1020# 2162  2261  
P0E0      1491  1495# 
P0E1      1513  1517# 
P0E10A    1713  1722# 
P0E2      1535# 
P0E3      1566  1569  1573# 
P0E4      1604  1607  1613# 
P0E5      1635# 
P0E6      1661# 
P0E7      1688  1692# 
P0T0      1474  1480# 
P0T0A     1488# 1493  1498  
P0T0S     1499# 
P0T1      1481  1504# 
P0T1A     1512# 1515  1520  
P0T1S     1521# 
P0T10     1676  1708# 
P0T10A    1714# 1725  1726  
P0T10B    1721  1727# 
P0T10C    1736# 1754  
P0T10D    1745  1752# 
P0T10E    1731  1742  1753# 
P0T10S    1743# 
P0T11     1709  1758# 
P0T11A    1762# 1776  1782  
P0T11B    1772  1778# 
P0T11C    1781# 1787  
P0T11S    1777  1788# 
P0T2      1505  1527# 
P0T2A     1533# 1543  
P0T2OK    1534  1538  1542# 
P0T2S     1539# 
P0T3      1528  1547# 1571  1576  
P0T3A     1565# 
P0T3S     1577# 
P0T4      1548  1593# 
P0T4A     1609# 
P0T4S     1617# 
P0T5      1594  1624# 
P0T5A     1629# 1647  
P0T5B     1634  1638  1646# 
P0T5S     1639# 
P0T6      1625  1650# 
P0T6A     1656# 1671  

P0T6B     1660  1664  1670# 
P0T6S     1665# 
P0T7      1651  1675# 
P0T7A     1680# 1690  
P0T7B     1689# 1701  
P0T7S     1702# 
P0T7WA    1693  1705# 
P0T7WB    1685  1686  1696  1706# 
P1E0      1827# 
P1E1      1850  1854# 
P1E10A    2020  2029# 
P1E10B    2047# 
P1E2      1876# 
P1E3      1911  1914  1918# 
P1E4      1955  1958  1964# 
P1T0      1813  1819# 
P1T0A     1824# 1836  
P1T0B     1826  1830  1835# 
P1T0S     1831# 
P1T1      1820  1838# 
P1T1A     1849# 1852  
P1T1B     1851# 1857  
P1T1S     1858# 
P1T10     2000  2015# 
P1T10A    2021# 2032  2033  
P1T10B    2028  2034# 
P1T10C    2044# 2063  
P1T10D    2053  2061# 
P1T10E    2038  2050  2062# 
P1T10S    2051# 
P1T2      1839  1864# 
P1T2A     1869# 1889  
P1T2B     1875  1879  1888# 
P1T2S     1880# 
P1T3      1865  1892# 1916  1921  
P1T3A     1910# 
P1T3S     1922# 
P1T4      1893  1944# 
P1T4A     1960# 
P1T4S     1968# 
P1T5      1945  1972# 
P1T5A     1977# 1984  
P1T6      1973  1986# 
P1T6A     1991# 1997  
P1T7      1987  1999# 
P1T7A     2004# 2010  
P15A      2451# 
P15B      2453# 2457  
P2A       2070# 2086  
P2B       2073# 2083  
P2C       2075# 2081  
P2D       2080# 2085  
P2E       2079  2084# 
P3A       2094# 2097  
P4A       2109# 2114  
P4B       2107  2112# 
P5A       2124# 2127  
P6A       2142# 2147  

P6B       2140  2145# 
P7770     1947  2013# 
RAMPA     2272# 2298  2312  
RAMPB     2275# 2283  
RAMPC     2279  2284# 
RAMPD     2282  2291# 2294  
RAMPE     2290  2295# 
RAMPF     2285  2299# 
RAMPWA    2288  2314  2315  2317# 
RAMPWB    2292  2318# 
RANCON     861   865   866   877# 
RANDEX     856   860   867   868   871   872   876# 
RANDNO     587#  797   893  
RANGEN     587   853#  875  
RANP1     1206# 1212  1215  1216  1221  2120  2131  
RANP2     1207# 1214  1218  1220  
RANR1     1208# 1226  1229  1230  1235  
RANR2     1209# 1228  1232  1234  
RANSAV     869   873   874   888# 
RANTAD     858   866# 
RANTBL     859   878# 
RANTND     855   876   887# 
RBIN      2213  2217# 2253  
RBINA     2226# 2248  
RBUSY      652# 2178  2186  2203  
RCF        568# 1563  1602  
RCHKW      653# 
RCNT2     1597  1610  1622# 
RDRCLR    1042# 
RDSR       627   847#  850  
READSR     673#  749   753   769   777   804  1104  1108  1112  1132  
          1136  
RIND      1290  1297  1299  1300  1335# 
RLOOP     1598# 1609  1611  
RSPD      1373# 2368  
RTNNO      643#  756   786   807  1091  
RVCTR     1015# 2165  2212  2227  2234  2241  2252  2264  
R7770     1596  1621# 
SASC      1051  1059  1074  1077# 
SB        1154  1415# 1694  2286  2293  
SBWAS     1160  1412# 1700  2297  
SEED1     1204# 2119  2130  
SETA       674# 1484  1507  1530  1627  1653  1678  1727  1760  1822  
          1841  1867  1975  1989  2002  2034  2071  2214  2249  2451  
SETB       675# 1191  
SETDLM     682# 1486  1499  1763  1788  1798  1803  1843  2301  
SETLOC     672#  733  1177  1193  1250  1253  1472  1475  1711  1729  
          1743  1811  1814  2018  2036  2051  2067  2100  2133  2150  
          2153  2158  2161  2164  2211  2226  2233  2240  2251  2257  
          2260  2263  2266  2333  2401  
SFADR     1094  1118# 
SHALT      586   803#  806   809  
SHLT       586#  768  
SRMSK      634#  849  1476  1815  2068  2093  2101  2123  2134  2151  
          2271  2334  
SRSET      743# 1479  1818  
SR0MSK     661# 
SR1MSK     662# 

SR2MSK     663# 
SR3MSK     664# 1105  
SR4MSK     665# 1109  
SR5MSK     666# 1113  
SR6MSK     667# 1133  
SR7MSK     668# 1137  
STALL      739  1018  1131# 1135  1144  2082  2096  2126  2270  2339  
          2342  
STCTA      628  1119# 1121  1123  1124  
STCTB      629  1125# 1127  1129  1130  
STCTR      626   811#  813   815   816   818   819  
STDLYM     630  1080# 1082  1084  1085  
STRT       709#  715  
SUFX      1118  1345# 
SWITCH     992   996  1000# 
SYNC       617# 2070  
SYNCA      618# 1246  2247  
SYNK       617  1238# 1247  1248  
SYNKA      618  1249# 1267  1269  1275  1276  1278  
SYNKB     1268# 1279  
SYNKC     1265  1270# 
TADDR      923   930   932   937# 
TCHK       614  1145# 1149  1150  1161  1162  
TCHKW      654# 1151  1156  2196  2208  2220  2231  2238  2245  
TDOMSG    1424# 
TEMP       640#  721   722   728   730   789   793   814   817  
TEMP1      641#  731  
TEMQ       958   961   966   968  1005# 
TEMR       972   976   984   993  1006# 
TENPWR    2414  2429  2430# 
TIM       1564  1583# 1586  
TIM1      1909  1928# 1937  
TKN       2353  2362  2372# 
TPCH       611  1171# 1175  1198  
TREAD      610  1164# 1170  
TSB        615  1147# 1153  
TSC1       961#  969  
TSC2       965   967   970#  980   982   997  
TSTMSK     669#  754  
TSTPC     2381  2386# 
TSTPL     2376  2384# 
TSTPP     2377# 2388  
TSTRC     2359  2364# 
TSTRD     2355# 2366  
TSTRL     2354  2362# 
TSTRPC    2369  2391  2394# 2399  
TYPAT      979#  987  
TYPSP      975   983# 
TYPSTG     604   955#  957   960   990  
UASCCN     607# 1087  1090  1152  1155  1692  1695  2284  2287  2291  
UCRLF      605# 
UDLYMS     631#  676   683  
UERROR     606# 1158  1495  1517  1535  1573  1613  1635  1661  1698  
          1722  1739  1773  1784  1827  1854  1876  1918  1964  2029  
          2047  2295  
UIOUT      632#  677   684  
ULPRGN     608# 2124  
ULRRGN     609# 2136  2142  

UMARK      613# 2089  2116  
UMOVE      625#  724   729  1286  2118  2129  
UNEXIT    1030# 
UNINT     1031  1348# 
UPLDR      612# 2090  2117  
UPUNCH     624# 1003  2423  
URDSR      627#  673  
USTCTA     628#  674  
USTCTB     629#  675  
USTCTR     626#  672  
USTDLM     630#  682  
UTCHK      614# 2078  2112  2145  2221  
UTPCH      611# 2095  2125  2338  2341  
UTREAD     610# 1240  1242  1244  2077  2105  2111  2138  2144  
UTSB       615# 2076  2104  2110  2137  2143  2219  
VALUE     2410  2413  2418  2434# 
WAS       1157  1420# 1697  2289  
WASC      1048  1054  1062  1076# 
WCHK       902   905   911   913# 
WNZERO    2166  2207# 
WRTN       764  1395# 
XTYPST     604#  763   946  1030  1095  1102  2310  2367  2389  2397  
_00137    2445  
_00140    2422  
_00141    2384  
_00142    2352  
_00143    2351  
_00144    2269  
_00145    2198  
_00146    2182  
_00147    2172  
_00150    2092  2122  
_00151    2005  
_00152    1992  
_00153    1222  1236  1308  1327  2277  2326  2337  
_00154    1137  
_00155    1133  
_00156    1109  
_00157    1105  
_00160    1073  
_00161    1070  1072  
_00162    1053  1060  
_00163    1018  2082  2096  2126  2339  2342  
_00164    1002  
_00165    1001  1113  
_00166     999  
_00167     995  
_00170     991  
_00171     971  
_00172     739  2270  
_00173     738  
_00174     736   894  2441  
_00175     720  
_00176     713  
_00177     712   717   754   798  
_02175    1560  
_02176    1551  
_02177    1549  

_03174    1931  
_03175    1905  
_03176    1896  
_03177    1894  

V5A